Illustlations by Gainax/Illustlations by Gainax.iso/pc/sadamoto.exe/M13W.DXR/00057_ETC.ls

Text File | 1994-11-27 | 922 b | 36 lines

on chketc
  global mode, posv, posh, grpno, pageno
  set grpno to 8
  set mode to 0
  if chkpoint(posh, posv, 0, 1161, 607, 1187) then
    set pageno to 0
    set mode to 1
  else
    if chkpoint(posh, posv, 0, 1197, 82, 1307) then
      set pageno to 1
    else
      if chkpoint(posh, posv, 92, 1197, 202, 1279) then
        set pageno to 2
      else
        if chkpoint(posh, posv, 212, 1197, 285, 1298) then
          set pageno to 3
        else
          if chkpoint(posh, posv, 295, 1197, 404, 1279) then
            set pageno to 4
          else
            if chkpoint(posh, posv, 414, 1197, 524, 1279) then
              set pageno to 5
            else
              if chkpoint(posh, posv, 535, 1197, 607, 1288) then
                set pageno to 6
              else
                set grpno to 0
              end if
            end if
          end if
        end if
      end if
    end if
  end if
end